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C1IPTOCWOTE SOB OH GAMES DISKETTE: 

Our recently released MMSFORTH GAMES DISKETTE, VOLUME I (see NL 
1:5) is now better than ever! We were going to save our latest 
super game program for Games Diskette Volume II , but it is so good 
that we just couldn't resist sharing it sooner. 

Somewhat more than a game, the new addition is a computerized 
environment for eryptoquote puzzlers. Cryptoquotes (which 
sometimes go by other names or slightly different styles) are the 
newspaper puzzles which encrypt a phrase by trading a false coded 
alphabet for the true one, then leave you to decode the true 
phrase by comparing number of occurrences of each letter, likely 
abbreviations, etc. Jill Miller, a eryptoquote fan, has created 
our new CRYPTOQUOTE program to help by displaying your guessed 
letters of the eryptoquote above the coded version, immediately 
inserting, removing or changing all occurrances of each 
simultaneously. It also shows an alphabet table in which the new 
value and the count of each are displayed. The fun and challenge 
of guessing is still left for you, but the once tedious note 
taking now is handled automatically. 

CRIPT0Q00TE does not stop there. It was so much fun that Dick 
Miller enhanced it further with the ability to accept inputs in 
plaintext. This means that you can Input your own favorite 
phrases in English and have them immediately encrypted and stored 
to disk by the program! Then Dick and Jill implemented a 
eryptoquote files system on the diskette, so you can save any 
eryptoquote to the location of your choice. As a final touch we 
include twenty challenging cryptoquotes on the diskette, enough to 
keep you guessing until you catch on and start sharing new ones 
with your family and friends! 



A 2BB-BIBTBMI P1ESEIT FOR MMSFOBTBi (Editorial) 

In this issue, we introduce you to our new MMSFORTH ¥2.0. We 
are very proud of it, and expect that most of you also will be 
enjoying its many new features before long. It's been two full 
years since we began marketing a new TRS-80 product called 
MMSFORTH V1.5. Versions 1.0 through 1.4 had occupied MMS for 
nearly a year before we felt ready to unleash the powerful but 
unruly new beast on our customers. MMSFORTH Versions 1.5 through 
1.9 have been increasingly good, as we continued to find new 
levels of performance and have listened to your many and valuable 
user comments. Since Version 1.5, we have not changed the Version 
1 kernel. Now we have, making V2.0 different inside as well as 
out and providing systems for the old TRS-80 Model I and the new 
TRS-80 Model III. We're not done yet - but MMSFORTH V2.0 will be 
the best for a while to come! 

Changing to a somewhat different vocabulary and operating 
system imposes some change-over problems. Effective June 1st, MMS 
WILL SHIP V2. 0-COMPATIBLE MMSFORTH AND RELATED SOFTWARE UNLESS 
I00R ORDER SPECIFIES FOR VI. 9 - so check for new pricing where 
applicable, and be sure to let us know if you want the earlier 
version instead! Also, V2.0 incorporates the new 79-STANDARD 
Forth words as a subset of its far larger vocabulary, so this 
Newsletter will begin using its vocabulary now to help keep all 
issues in Volume 2 reading alike. For the time being, though, 
we'll include appropriate translations for V1.9 because we realize 
that only a few of you will be up on the latest for the next month 
or two . 

— A. Richard Miller. Editor 4th Class 



MMS plans to move CRYPTOQUOTE over to a Volume II diskette when 
a few more games are ready. Meanwhile, you can get it on our new 
improved MMSFORTH GAMES DISKETTE, VOLUME I for the same old $39.95 
plus $2.00 s/h. It was a good value then; with five great new 
Forth games plus the original BREAKF0RTH aboard, it's a 
spectacular value now! We like it so much that , until the end of 
May, we will rewrite any original MMSFORTH GAMES DISKETTE with the 
new CRYPTOQUOTE program (the V1.9 copy) for only the $2.00 
shipping/handling charge! 



DATAHUDUBR CUSTOM HODIFICATIOa IECHSIQDBS 

Last month we took a first trip through the MMSFORTH source 
code of THE DATAHANDLEH to teach it a few new tricks - and to see 
how MMS goes about doing such an operation. Now that you're all 
old hands at this, let's take a look at some of the existing 
DATAHANDLER words and how to use them from the keyboard. Then we 
will again roam inside, to see how some custom routines use them 
for special reports. 



GET-TOGETBKK 

Share your questions and answers with a MMSFORTH User Group, or 
contact MMS for help to start one in your metropolitan area. Here 
is our present list of contacts for local MMSFORTH User Groups: 



CA: Earl Mortensen, 

(415/367-9882). 

CA: Ken Nonomura, 416 

(415/285-5062). 

CA: Morris Herman, 

(805/964-7144). 

CA: Rich Royea, 6456 Lubau, Woodland Hills 91367 (213/704-6859). 



974 Pleasant Hill Road, Redwood City 94061 

Duncan Street, Apt. 5, San Francisco 94131 

503 Rosario Drive, Santa Barbara 93110 



1222 Jason Drive, Denham Springs 70726 



Framingham 01701 



LA: Ed Laughery, 

(504/665-7537). 

MA: Jim Gerow, 1630 Worcester Road, 

(617/443-9521 X3562 days, 872-1882 eves.). 

MD: Paul van der Eijk, 5480 Wisconsin Avenue #1128, 

20015 (301/656-2772). 

HI: Kim Watt, Box 1013, Berkeley 48072 (313/288-9422). 

MI: Bob Zwemer, 6408 South Washington, Lansing 

(517/393-9287). 

MJ: Paul Zucchino, 148 Bertrand Drive, Princeton 

(609/452-3585 days, 921-7629 eves.). 

TX: Larry Goforth, 10203-J Golden Meadow, 

(512/836-0981). 

TX: Jim Shepard, 16210 Arbor Downs Drive, 

(214/661-9702). 

TX: Dan Healy, 11511 Katy Freeway, Suite 150, 

(713/*96-4660 days). 

WA: Rod Proctor, 13520 N.E. 29th Place, 

(206/885-4171 days, 883-1923 eves.). Rod also is on THE SOURCE. 

AUSTRALIA: Peter Wragg, 2 Jilba Street, Indooroopilly, Queensland 

4068 (07/378-1623). 

CANADA: Kalman Fejes, 1149D Meadowlands Drive East, Ottawa, 

Ontario K2E 6J5 (613/225-2443). 

ENGLAND: John Newgas, 1 Philip Court, E 

London N6 5LN (01/539-7071 days, 348-651E 

JAPAN: Akira Akutsu, M.D., 2-176 Issha, Meito, Nagoya, 465. 

WEST GERMANY: Nigel Head, Birngartenweg 93, 6100-Darmstadt 



Chevy Chase 



48910 

08540 

Austin 78758 

Dallas 75248 

Houston 77079 

Bellevue 98005 



) Hornsey Lane, 
eves. ) . 



Highgate, 



H0TE: Program trading is one popular facet of these meetings, but 
NOT commercial programs and WITHOUT MMSFORTH SYSTEMS aboard! 
Promote legitimate sharing, discourage pirating, and take care not 
to jeopardize your own MMSFORTH serial number. 



THE PROJECT AND THE TOOLS: 

Our tools will be MMSFORTH V2.0, its on-board full-screen 
editor, and THE DATAHANDLER VI. 2. (Users of MMSFORTH V1.9 and 
those following our ¥1.9 instructions in MMMSFORTH NL 1:6 should 
note that, in addition to the required V2.0 word conversions and 
much lower-casing of text, all DATAHANDLEH blocks have been 
shifted two blocks higher to accommodate V2.0's larger precompiled 
Forth.) If you have a printer, we recommend using PCRT, PLISTS 
and CRT to crank out a hardeopy of Source Blocks 12-49. And if 
you also have XREF, the powerful cross-referencing utility on the 
MMSFORTH Utilities Diskette, use it on the same blocks for a truly 
professional roadmap for the trip ahead. 

Boot up an original version of THE DATAHANDLER or the fancy one 
you whipped up last time, from source or from precompiled. Best 
of all will be a "small-files'' version with the Editor still 
aboard, as described in IIL 1:6. (In V2.0, paren out "FORGET 
DIRBLK" on Block 18 instead of "FORGET SCR" on Block 16.) Then 
GET a small file and let's begin to play! 

FIELD: 

Having studied the STRINGS introduction in Newsletter 1:4, you 
should be ready to meet DATAHANDLER ' s FIELD word. Preceded by the 
record-number and the field-number, it removes them from the stack 
and replaces them with the address of the appropriate string. 
Yes, Virginia, DATAHANDLER fields are all kept as strings! 
Remember, of course, that our internal counts begin with (for 
the computer) while the external counts begin at 1 (to pacify the 
non-computer types). So, to print Field 4 of Record 2 to the CRT, 
enter: 
1 3 FIELD $. 

Personally, I tap the Space key once before pressing Enter, to 
clearly identify the beginning of the output string. Try it both 
ways, and vary the fields called for each of thjese new words until 
you've got the idea down pat! 



NFIELD: J 

Want to change the name of an existing field in the current 
file? This time the magic word is NFIELD, again preceded by the 
field number counted from 0. So to see the name of the current 
Field 4, enter 3 NFIELD $. To change it, remember that each 
standard fieldname consists of 8 characters. Use a string literal 
to redefine all 8 characters, including trailing blanks, like 



this: 

$" NEWNAME 

test your 



'• 3 NFIELD $! {$» was $L in VI. 9.) Now be sure to 
change with FIELDS to display the new story. Remember 

permanent one! 



to SAVE the latest version if the change is 
TFIELD: 



This array holds the type of field, A or N, and like NFIELD it 
takes the field number from TOS. But since it only has to contain 
one character, it holds the ASCII code instead of a string. You 
can look at the field type in Field it by entering 3 TFIELD § EMIT 
(EMIT was ECHO in V1.9S. To reset it to an A, enter KEY 3 TFIELD 
! and then hit the A key. 

NAME: 



initialize the light-pen point positions, and the other word, 
LPSCAN, to wait for a valid light-pen input and return the 
relative number of the selected point. The only "extra" system 
word required is ARRAY from Block 42 Line 2 of the MMSFORTH System 
(Block 28 in VI. 9). If your application doesn't need the 
douple-precision and array blocks (39-42), carefully type in the 
ABRAY definition by itself. 

Hopefully, the in-line comments and the demonstration block 
will provide enough information for you to tailor the light-pen 
routines to your particular application. In more complex 
applications than LPDEMO, I find "that an NCASE structure after the 
LPSCAN is a very easy and powerful means of "seeing the light." 



This array holds the filenames index. NAME $. displays FREE, 
1 NAME $. gives the first user filename in THE DATAHANDLER's files 
directory, etc. Want to know the name of the current file in RAM? 
Easy, just enter NINDEX § NAME $. to display It on screen! In 
many of Its custom DATAHANDLER projects MMS adds a word, .FILE, 
which prints the current filename, neatly boxed, at the upper 
right of the screen in such commands as SAVE, KILL, etc. 

RECORD-* : 

How many records are in the current file? RECORD-* ? will show 
you, or RECORD-* § will put it on TOS, ready for DO.. LOOP 
operations! 

FIELD-*: 

Like the above, for the number of fields. 

CUSTOM MODULES: 



( 
1 
2 
3 
4 ( 



10 : 
11 

12 : 
13 

14 : 

15 : 



light-pen routines 1 of 2 Jim Gerow 10/80 ) DECIMAL 

150 CONSTANT RATE ( scan rate: 100=fast, 1000=slow ) 
25 CONSTANT LPPMAX ( max t of light-pen points wanted } 
LPPMAX ARRAY LPP ( light-pen points array ) 
CODE routines to input & reset cassette port latch ) 
CODE LPIN 255 IN A L MOV H MVI PSH 
4 A MVI 255 OUT NEXT 
( true if BREAK pressed ) ?KEY 1 = ; 
. pn n -> ) ( initialize light-pen points) 
DO LPP S I - LPP ! LOOP ; 
scan rate" delay loop ) 
LPCLR RATE DO LOOP ; 
( stores c to point n ) 



( 



CODE LPCLR 
?BRK ( -> f ) 
LPPI ( p1 p2 . 
DOP LPP ! 
LPDLY ( -> ) 

10 DO LOOP 
LP! ( n o -> ) 

SWAP LPP § 15360 + C! ; 
LPON ( n -> ) ( turns "on" point n ) 
LPOFF ( n -> ) ( turns "off" point n ) 



140 
128 



LP! LPDLY 
LP! LPDLY 



THE DATAHANDLER contains some excellent examples of modules 
applying the above routines. Check them out yourself before 
modifying them and adding some of your own. Pay close attention 
to the CHECK routine, the LABELS routine, and the MAIL routine 
because they are really custom report modules which have been 
included. 

In the MAIL routine on Block 44, for instance, first another 
new word, ?, , is defined. ?, looks to see if the string includes 
a comma. If so, it flips the two parts about that comma - as is 
done on Field 1 in the MAIL routine. (Here, Field 1's DO.. LOOP 
increment of is cleverly used to toss it to the ELSE side of an 
IF. .THEN conditional branch!) Strings are handled as required, 
including concatenation of the CITY/STATE and ZIP fields. MAIL is 
a sophisticated special report routine which also can serve as a 
good model for one of your own. 

Other than the prior notes concerning V2.0's 2-block shift 
upward of all DATAHANDLER blocks and the new 79-STANDARD word 
changes, about the only new trick which will affeet last issue's 
V1.9 info on DATAHANDLER modifications is a new way to measure the 
number of sectors in RAM before reprecompiling. Once a standard 
DATAHANDLER VI. 2 is loaded under MMSFORTH V2.0, /MOD and / are 
forgotten. If you have enough RAM, you might add them back in. 
Or you can calculate the number of complete 256-byte sectors and 
the number of bytes in the final one for DWTSECS without / : 
In V2.0, START-AREA § 19200 - 256 U/MOD . . replaces 
V1.9's START-AREA § 19200 - 256 / 1+ . 

Coming: more custom report modules for THE DATAHANDLER, and 
ways to answer some of its regular queries from program instead of 
from the keyboard. 



BLOCK : 91 



PERIPHERAL TALK 





1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 



light-pen routines 2 of 2 Jim Gerow 10/80 ) 
LPWAIT ( -> ) ( wait til light-pen "sees" light, BREAK quits 
IF QUIT THEN LPIN 130 > UNTIL ; 

( turns on all light-pen points ) 
1 DO I 140 LP! LOOP ; 
n ) ( equalized delay based upon point # ) 
- DO LPDLY LPDLY LOOP ; 
( returns selected light-pen point ) 
LPWAIT LPP § 1+ 1 DO I LPOFF 1 
DO LPIN 130 > J LPON IF NOT LEAVE ELSE LPIN 
130 < IF NOT LEAVE ELSE J LPOFF THEN THEN LOOP 
IF I 42 LP! LPDLY LPDLY LPDLY LPDLY DROP I LEAVE THEN 
LOOP ?D0P UNTIL LPDLY1 ; 

LPSCAN ( -> n ) ( displays points, waits, then returns pt.# 
LPCLR LPPSET LPGET ; 



BEGIN ?BRK 
LPPSET ( -> ) 

LPP § 1+ 
LPDLY1 ( n -> : 

LPP § OVER 
LPGET ( -> n ) 

BEGIN 
3 



BLOCK : 92 



BOH A LIGHt-PEI H MMS'ORTH: 
(by Jim Gerow) 





1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 



( light-pen demo routine Jim Gerow 12/80 ) 

( initialize LPP array w/ point positions, and # of points ) 
325 453 581 709 837 5 LPPI 

( Demonstration routine, display 5 points, wait for a selection, 



( 



then print the selected point. Press BREAK to exit. 



LPDEMO ( -> ) PAGE 
BEGIN PTC ." 
LPSCAN ?DUP IF 
100 DO LPDLY 
UNTIL ; 



6 1 DO 3 I I + + 7 PTC I . LOOP 
CHOOSE ANY POINT" 
PTC ." YOU CHOSE # " . THEN 
LOOP ( delay between inputs ) 



For those of you who have bought a light-pen (the "PHOTOPOINT" 
from Micro Matrix or another inexpensive one) and want to start 
making the FORTH connection, the following screens should be quite 
useful. 

The operation of the light-pen is simple. The light-pen 
connects to a tape recorder which is hooked up to the cassette 
port of the computer. The user simply aims the light-pen at a 
selected target point on the video display. 

The light-pen acts as a light-activated switch ("on" when it 
sees light, "off" when it doesn't), the recorder acts as a signal 
amplifier, and the cassette port inputs the amplified light-pen 
signal to the CPU. The only "fly in the ointment" is the cassette 
port. The cassette port is a "pulse catcher", that means once it 
has been turned on, it has to be reset to turn off. 

The software side of light-pen operation is a little more 
complicated. The program must first display the target areas or 
light-pen points on the video display. After waiting for the 
light-pen to detect light, a sequential scan is made to determine 
which of the points are selected. If the light-pen "tracks" a 
light-pen point while that point is turned off and on a couple of 
times, the scan stops and the number of the point is returned as 
the selected point. The program then tests the point number and 
branches to the selected routine for "further processing. 

In order to simplify the software interfacing, I've provided 
two blocks which boil down to two "user" words. One word, LPPI, to 



Note: This source code is written for V2.0. For V1.9 use editor 
to change BEGIN. . .UNTIL to BEGIN... END (3 times), ?DUP to -DUP (2 
times) and PAGE to CLS (1 time). 

MMSFORTH MOBIFiCATIOMS 

LOHER TOM LQHER-CASE: 

What's lower than lower-case, I hear you ask? An omission in 
our Issue 1:6 article on undoing V1.9's lower-case video driver 
routine, that's what! The CRT definition near the end of Page 4 
is correct, but should have included an additional 'CRT' to the 
right of the semicolon in order to execute the new word. Our 
Model I V2.0 is delivered without a lower-case driver, removing 
the need for this fix; the driver is easily loaded by those with 
the appropriate keyboard modification. 



MMSFORTH QOICI1ES 

KEIBOARD MONITOR ROUTHE: 

This brief routine permits observation of keyboard scan codes. 
(For V1.9, change PAGE to CLS, and UNTIL to END.): 
: KEYS PAGE 8 25 PTC " 14400:" 

BEGIN 8 35 PTC 14400 C? » " UNTIL ; KEYS 
It monitors the status of the 14400 RAM address, which in the 
TRS-80 reflects the status of the keyboard's non-alphanumeric 
keys. Do you see why the final quotes are Included? If you 
don't, try it again without them and then hit the space bar. 



MMSFOBTH NEWSLETTER J41MOAL INDEX 

It's always fun to start a new tradition, and the beginning of our MMSFORTH Newsletter's second year is a good time to report 

on its first. The following Volume 1 Index names authors of guest-authored articles/programs or of mentioned books. Codes used 

include: B(eginner, Intermediate, A(dvaneed, Modifications, D(atahandler, Peripherals, N(ew products, and OCther. This data 

was printed directly from a DATAHANDLBR file via its REPORT routine. It is included as an additional sample file on our newest 

DATAHANDLER diskettes. (NOTE: MMS permits the no-cost exchange between licensed DATAHAMDLER owners of this specific data file, 
named NEWSLETTER, and encourages local MMSFORTH Oser Groups to facilitate its distribution to appropriate individuals!) 



1:1 10 

Editorial 

Forth, Inc. 4 FIG 
1:1 1 B 

Bottles & Mugs 

simple graphics demo 
1:1 11 J.Gerow 

Digi-Pong 

graphics game 
1:1 1 B 

LIFE 

MMS demo 
1:1 2 B 

PAINT 

exc . intro. 
1:1 2 B 

BACKUP 

different from OBACKUP 
1:1 2 BP 

Disk Drives 

test routines 
1:1 2 P 

Tapes 

correction 
1:1 3 BP 

Printers 

custom drivers, JKL w/graphics 
1:1 3 A A.Watson 

ADOMP 

alpha-hex dump routine 
1:1 3 A 

Memory Map 

¥1 .8 Memory Map 
1:1 3 

Get-together 

User groups 
1:1 4 N 

What's Coming 

DH,FP,Z80, others 
1:1 4 N 

Upgrades 

MF V1.8 
1:1 4 M 

#IN Change 

single-pree. only 
1:1 4 I 

Merging 

xfer of boot 
1:2 1 

Editorial 

publicity, DH 
1:2 11 

MMSFORTH VI . 9 

first info ¥1.9 
1:2 1 ID T.Dowling 

MERGE for DH 

MERGE routine for DH 
1:2 1 HO 

Subscribe to NL 

1st subscr. info 
1:2 2 B 

SHIPPING 

moving graphics 
1:2 2 B 

SORT 

MMS SORT demo 
1:2 3 B 

Home Remedies 

debugging Forth 
1:2 3 IN A.Schaeffer 

BREAKFORTH 

graphics game w/sound 
1:2 3 

Get-together 

User groups 
1:2 3 N 

What's Coming 

DH ¥1 . 1 , Communis. , others 
1:2 4 IP P.Mork 

Home Controller 

drives Sears Home Cntrlr. 
1:2 4 PM 

Disk Drives 

MF mods 
1:2 4 NB 

RS Lower-case Display Mod 

¥1.9 feature explained 
1:3 1 

Editorial 

meet crew at MMS 
1:3 1 

BYTE Forth issue 

Aug. '80 



1:3 1 B D.Hun tress 

KALEIDOSCOPE 
repeat graphics 
1:3 1 

Get-together 
User groups 
1:3 2 A T.Dowling 4 J. Miller 
Absolute Assembler 
for SYSTEM tapes, etc. 
1:3 3 I T.Dowling 
PICK 4 ROLL 

Forth tools 
1:3 4 B 

Quickies 

.0, SO, .S, MEM, ASCII 
1:3 4 BM 
;S Use 

fix B.32 
1:3 4 DBM 

DH Fix 

PAD 512 + (obsolete) 
1:4 10 

Editorial 

Piracy , overwork 
1:4 1 H 

Utilities Diskette 

descrip. 
1:4 1 

F0RML Conf. 

Nov. in C« 
1:4 1 

Forth Conven. 

Nov. in CA 
1:4 10 

Northeast Comp.Show 

Nov. in Boston 
1:4 1 

DH ¥1 . 1 Upgrades 

how to get 
1:4 1 

Mailing to MMS 

safe packaging 
1:4 2 A T.Dowling 

Real-time Interrupts 

Expl. 4 TIMER routine 
1:4 2 DB 

Share your Database 

swap data files 
1:4 2 BD0 J.Gerow 

MF Quick-Ref File 

disk from MUG 
1:4 2 BQ 

Stack-dump 

improved .S, & TEST 
1:4 2 BQ 

COUNT 

CONSTANT, VARIABLE, etc. 
1:4 2 

Get-together 

User groups 
1 :4 3 B 

Integer vs. Floating Pt , 

discussion 
1:4 3 I T.Dowling 

Double- Free. Integer Math 

descrip. 4 table 
1:4 3 B 

Viking & Seat-Eject. 

LIFE graphics 
1:4 3 1 A.Schaeffer 

MUSIC 

music routine 
1:4 4 M J. Miller 

LIFE fix 

for V1 . 8 tape 
1:4 4 BM J.Rible 

Available RAM 

add to DIR 
1:4 4 MN 

Moved Words 

V1.9: ALLOT, DIR, ALLOT, CUSTOMIZE 
1:4 4 10 

¥ocabularies 

on misuse 
1:4 4 DM 

DH Fix 

PAD 512 + now 256 + 
1:4 4 

Reverse Polish Notation 

mentions RPN book 
1:5 1 

Editorial 

special distrib, 1K sold! 



1:5 1 

Get-together 

User groups 
1:5 1 K D. Huntress, A.Schaeffer 

Games Diskette 

4 new games 
1:5 1 N T.Dowling, P. van der Eijk, A.Watson 

Utilities Diskette 

adds ALLCAPS & XREF to FP 4 Z80 
1:5 1 MA R.Loeliger 

THREADED INTERPRETIVE LANGUAGES 

good new book on Forth structure 
1:5 2 B 

Error Messages 

explained 
1:5 2 B 

Strings 

explained 
1:5 2 MB 

AQUICK fix 

fix error 
1:5 2 

RS ROM bomb 

full-ASCII problems 
1:5 2 BN 

CUSTOMIZE 

makes reprecomp. easy 
1:5 3 PB 

Patch bad tape blocks 

block copy, etc. 
1:5 3 PMB 

Disk Drive Pblm. 

CPU speed, motor start delay 
1:5 3 B 

BASE act 

Quickie 
1:5 3 DI J.Miller 

MAKE-LAST 

add to DH 
1:5 3 DI T.Dowling 

Checkbook Summary 

year-end for DH 
1:5 4 DO 

DH custom mods 

make money! 
1:5 4 

Model III 

coming 

Tape still ¥1 .8 

status 
1:5 4 DN 

DH upgrades 

to ¥1 . 1 
1:5*0 

Safe shipping 

packing of tapes & disks 
1:5 4 B D. Huntress 

PATTERNS 

graphics exercise 
1:6 1 

Editorial 

MFNL renewal & P.O. rates 
1:6 1 NB0 D.Higgins 

PROGRAM DESIGN & CONSTRUCTION 

good design book for Forth 
1:6 1 PN0 E.Fejes 

Exatron Stringy Floppy 

$15 patch, V1.8 tape to ESF 
1:6 1 DI 

DATAHAHDLER custom mods 

begins major info on DH mods 
1:6 4 DH 

MAKE-LAST fix 

change to RECORD-* § 
1:6 4 DMI 

MERGE mystery 

optional mod 
1:6 4 MIP T.Dowling 

JKL block 

graphics mod for Epson MX-80 etc. 
1:6 4 MI 

STRINGS mods 

improve IN$ and $C0MPARE 
1:6 4 MI 

If no Lower-case 

how to disable 
1 :6 4 B 

LIFE pattern 

nice pattern 



HMSF081H fllSIOI 2.0 (M».I * WD. Ill) EXPECTED H JUNE: 

At MMS, work on MMSFOHTH Version 2.0 is nearly complete and 
draft versions have been reviewed by selected users. Our usual 
policy is to withhold advertisements of a new product until it is 
actually in distribution. But this first issue of the second 
volume of the MMSFOHTH Newsletter is a good place to introduce 
present users to its new words and capabilities , and we want you 
to be the first to be advised on new product availability. 

We expect to be delivering at least the diskette Version 2.0 in 
early June and are accepting MasterCard and VISA advance orders at 
this time. The new price for either Model I or Model III will be 
$129.95 for disk, $89.95 for tape, plus shipping/handling. The 
new shipping/handling price may become as much as $5.00. To 
rewrite your present ¥1 .-whatever to V2.0 (Model I only, since it 
is a single-system, single-user license) will only cost the usual: 
the price difference plus $10.00 transfer charge (that's a total 
of $75.00 for recent diskette owners, $55.00 for cassette), plus 
S/H. It will require our rewriting of the original copy of your 
V1 .-whatever MMSFOHTH SYSTEM DISKETTE or CASSETTE, the one with 
the MMS label. If you send them along, we'll rewrite your 
original DATAHANDLER, MMSFOHTH GAMES or UTILITIES diskette to V2.0 
for $10.00 each. 

How, what's in the new box? First, a looseleaf binder with a 
fancy new cover. And inside, a few hundred other changes: a new 
kernel, a new memory map, many new words, each of which now is 
recognised as a unique word as much as 31 characters long 
(although it still uses only 4 bytes in the header), general 
utilisation of lower-case text (we ship the Model I copies without 
the lowercase video display driver loaded , ready for easy 
conversion by those who have the supporting hardware), new levels 
of protection and convenience in 1/0 and editing operations, a new 
Page mode for editing the entire block as a single line, multiple 
block buffers, mixed disk drive combinations, even the capability 
to read, write and run (but not boot) your Model I MMSFOHTH 
diskettes in the Model III under the Model III MMSFOHTH system! 
(Right, you don't have to convert them as in Model III THSDOS. 
Instead, you just pop them in and run them!) 

In general, the system will remain a familiar one for most of 
your earlier MMSFOHTH operations. But in the interest of 
compatibility with upcoming Forth books and magazine articles, and 
to permit you to create and run portable programs, we have 
converted the appropriate subset of our prior MMSFOHTH vocabulary 
to the FORTH 79-STANDARD wordset MMS helped create. (Note that we 
have not designed our much more extensive and powerful wordset for 
portability to other Forth systems, nor does our usual User 
License Agreement permit it. The 79-STAHDARD subset must be used 
exclusively for such tasks.) We are reviewing manuscripts for a 
next generation of Forth books, and as they become available I 
believe you will see the value of this change. 



non-ambiguous Control key. (Radio Shack has delivered many TRS-80 
Model I's and Model Ill's which use Shift-Downarrow as a Control 
key, and, unfortunately, many of each which do not.) We use our 
new Control key to type the "extra" ASCII characters not on the 
normal keyboard, to invoke most editor commands, and with the 
Shift key to invoke the full-line editing operations. 

This new level of keyboard access permits MMSFORTH's 
full-screen editor to default into Replace mode instead of the old 
inactive mode, and a oontrol-I toggles back and forth to the 
optional Insert mode. A control-P toggles into or out of the 
optional Page mode, from the default Line mode. This new Page 
mode uses "full-block editing", sliding all following lines of the 
block on Insert or Delete operations. lou will use it to splice 
extra phrases "between" full lines, to slide whole columns of data 
at once, and to expand compact, hard to read code into 
"pretty-printed" blocks for analysis and modification. MMS is 
preparing a simple letter-writer utility based upon this new 
feature. 

Without leaving the editor mode, one can scan to the next block 
(with or without rewriting the present one), one can read the 
present screen number, and one can exchange the other block buffer 
onto the screen - great for line moves, or for checking for 
differences in two similar blocks! 

Our revised full-screen editor is so smooth that we've removed 
the last traces of our earlier ones. And since there is no other 
one, we now invoke it with EDIT instead of EDS. 

Would you believe we can edit the keyboard entry line, as well? 

Loading an optional "extended EXPECT" provides Replace, Insert 

and Delete capabilities on the line you are keying in. Better 

yet, you can even recall the last-entered line (after an error, 

say!), edit it, and try it again. 

MMSFOHTH V2.0 includes several printer driver options in Forth 
for custom modification. The regular one includes a MARGIN 
variable. One use is to enter 10 MARGIN ! so your 67-column 
PLISTS don't have to begin in column zero where they get 3-hole 
punched along with the paper! The extended printer driver permits 
reset of most paper-formatting adjustments, as in a 
word-processor. 



PLISTS now expect a starting~block# and a count; 
spanning words, they use the Range rather than the 
But if you know the latter, use it followed by :R 
Range! Looking for Block 40 but the disk is in 



to 



INDEX and 
like all other 
ending-bloek# . 
to convert 

Drive 1 and you don't remember how many blocks are on Drive 0? 
Just say 40 :1 EDIT and there you are! Drive 1 was empty after 
all? You haven't hung the system, just caused an error report. 
Write-protect-tabbed disks also are painlessly reported, as are 
wrong-density diskettes for your current Model III configuration. 



What will these 79-STANDARD words mean to you personally? A 
few learning-curve hassles at first, naturally. But our manual 
will help, and V2.0 includes a CONVERT utility which automatically 
rewrites the new V2.0 synonym definitions onto your VI. 9 source 
blooks, and reports on those changes which require some programmer 
decision for best implementation. V2.0 also includes a SEARCH 
utility by Andy Watson, which enables you to pick up all 
occurrences of that word you want to change. SEARCH is far less 
powerful than the XREF utility on our Utilities Diskette, but it 
is at hand at no extra charge and will be 'appreciated. If you 
wish to learn the new 79-STANDARD wordset now, we stock the 
79-STANDARD Manual for $10.00 plus S/H; it, plus the V1.9 
instructions and four new pages, is all we are using now at our 
evaluation sites. 

V2.0 implements the TRS-80 keyboard's Clear key as a 



There's more, lots more. But this should suffice to show that 
MMSFOHTH Version 2.0 is powerful, flexible and very forgiving. 
You'll like iti 



MM IORK CITI EXHIBIT, MAI 21ST-23BB 

If you can, please say hello to MMS in Booth 39 of THE NATIONAL 
TRS-80 MICROCOMPUTER SHOW at the New York Statler Exposition Hall 
(across from Madison Square Garden). We'll be demonstrating the 
new MMSFORTH V2.0 and THE DATAHANDLER on the TRS-80 Model III, 
along with some items too new to mention yet! 

THE LIST WORD: "Terrific! FORTH is to FORTRAN as the Caribbean 
is to New York City!" 

- Howard Berger, Brooklyn Heights, New York 



MMS 



MILLER MICROCOMPUTER 
SERVICES 

61 LAKE SHORE ROAD, NAT1CK, MASS. 01760 
1617)653-6136 



